home *** CD-ROM | disk | FTP | other *** search
/ MacHome 1999 February/March / MacHome CD (February and March 1999).iso / Edutainment / INFOHIGHWAYDEMOS / demo / MENU.DCR / scripts_23.ls < prev    next >
Encoding:
Text File  |  1999-09-16  |  1.2 KB  |  39 lines
  1. on enterFrame
  2.   set ActiveStartspr to 3
  3.   set inforouteChezVous to ActiveStartspr
  4.   set startBall to 4
  5.   set inforouteChezVousBall to 8
  6.   set branchementsBall to startBall + 7
  7.   set UtiliteEtLogicielsBall to startBall + 8
  8.   set startHighLightSpr to 13
  9.   set branchements to startHighLightSpr
  10.   set UtiliteEtLogiciels to startHighLightSpr + 1
  11.   set startHotSpot to 15
  12.   set branchementsHS to startHotSpot
  13.   set UtiliteEtLogicielsHS to startHotSpot + 1
  14.   set ro to rollOver()
  15.   puppetizeExclude(0, ro - (startHotSpot - startHighLightSpr), branchements, UtiliteEtLogiciels)
  16.   case ro of
  17.     inforouteChezVous, inforouteChezVousBall:
  18.       go(the frame)
  19.     branchementsHS, branchementsBall:
  20.       puppetSprite(branchements, 1)
  21.       set the member of sprite branchements to member "InforouteChezVousBranchements"
  22.       updateStage()
  23.       go(the frame)
  24.     UtiliteEtLogicielsHS, UtiliteEtLogicielsBall:
  25.       puppetSprite(UtiliteEtLogiciels, 1)
  26.       set the member of sprite UtiliteEtLogiciels to member "InforouteChezVousutilitesEtLogiciels"
  27.       updateStage()
  28.       go(the frame)
  29.     otherwise:
  30.       depuppetize(branchements, UtiliteEtLogiciels)
  31.       updateStage()
  32.       go("infoRouteChezVousClose")
  33.   end case
  34. end
  35.  
  36. on exitFrame
  37.   go(the frame)
  38. end
  39.